home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / C-D / DeveloperStax.cpt / Developer Stack 1.2r / card_33669.txt < prev    next >
Text File  |  1989-02-26  |  2KB  |  81 lines
  1. -- card: 33669 from stack: in.2r
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 3837
  5. -- name: FileType
  6.  
  7.  
  8. -- part 2 (button)
  9. -- low flags: 00
  10. -- high flags: A004
  11. -- rect: left=386 top=269 right=293 bottom=471
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: try me
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   if the optionkey is down then edit script of me
  23.   put filename() into temp
  24.   if temp is empty then exit mouseup
  25.   put FileType(temp)
  26. end mouseUp
  27.  
  28.  
  29.  
  30. -- part contents for background part 5
  31. ----- text -----
  32. FileType
  33.  
  34. -- part contents for background part 6
  35. ----- text -----
  36.  
  37. FileType lets you find out for any file its TYPE (or, in layman's terms, format). 
  38.  
  39. FileType can be used together with ChangeFileType* to change the type of a file. 
  40.  
  41. Other XCMDs of potential interest are FileName*, reNameFile*, FileCreator*, ChangeFileType*, & FileVisFlag*.
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49. --------------------------------------------
  50. Q: Who invented me?
  51. A:       Larry Wolfarth
  52.           2133 N. Lincoln St.
  53.           Arlington, VA 22207
  54.  
  55. Q: Any limitations on my use?
  56. A:  Just mention the name of my creator in a visible place if you use this XCMD for commercial purposes. [Note: My creator is not a lawyer, but my creator's wife is....]
  57.  
  58. Q: What if you don't like me?
  59. A:  You may (1) write the author & ask for the source code, (2) grumble but continue to use the XCMD as is, or (3) forget the whole thing. HOWEVER, you may NOT complain: you got what you paid for....
  60.  
  61. ••••••••••••••••••••••••••••••••••••••
  62. Reading suggestion: The 1988 Bill James Baseball Almanac-- for the thinking baseball fan! (Write my creator if you are interested in baseball games, simulations, etc. He'll get back to you).
  63.  
  64. ‚Ä¢‚Ä¢Note from Steve Drazga, Editor DevStack
  65. I would like to publicly thank Larry for sending in this contribution & supporting the Developer Stack.  It was especially nice the way he formatted his contribution so all I had to do was paste it into the new issue.  Way to go, Larry!
  66.  
  67. -- part contents for background part 7
  68. ----- text -----
  69. Syntax:
  70.  
  71.  
  72. FileType(<"FullPathName"> ) 
  73.  
  74. returns a four letter code specifying the type (format ) of the file.
  75.  
  76.  
  77.  
  78.  
  79. -- part contents for background part 10
  80. ----- text -----
  81. 31